This property returns the filename of the macro currently executing.
Runtime
Read-Only String property
MsgBox "Executing Macro " & Name & " in file " & Filename
Macro Object Model